% Funcion error - Calcula el error cuadrático medio
% Parametros:
% s: Salidas deseadas.
% o: Salidas calculadas.
function ans = middlesquareerror(s, o)
    sum = 0;

    for i = 1 : columns(o)
	sum = sum + (s(i)-o(i))^2;
    endfor

    ans = sum/2;
endfunction

